home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 November / EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso / earcd / program / amos / amoslist.lzh / AMOSLIST / 000091_amos-request@svcs1.digex.net_Tue Sep 5 01:39:58 1995.msg < prev    next >
Internet Message Format  |  1995-10-02  |  3KB
  1. Received: from svcs1.digex.net (svcs1.digex.net [204.91.197.224]) by mail1.access.digex.net (8.6.12/8.6.12) with ESMTP id BAA25559;  for <mcox@access.digex.net> ; Tue, 5 Sep 1995 01:39:57 -0400
  2. Received: (from daemon@localhost) by svcs1.digex.net (8.6.12/8.6.12) id AAA05923 for amos-out; Tue, 5 Sep 1995 00:29:13 -0400
  3. Received: from mail1.access.digex.net (mail1.access.digex.net [205.197.247.2]) by svcs1.digex.net (8.6.12/8.6.12) with ESMTP id AAA05920 for <amos-list@svcs1.digex.net>; Tue, 5 Sep 1995 00:29:12 -0400
  4. Received: from mail.shlink.de (root@mail.shlink.de [194.64.6.2]) by mail1.access.digex.net (8.6.12/8.6.12) with SMTP id AAA21047;  for <amos-list@access.digex.net> ; Tue, 5 Sep 1995 00:28:55 -0400
  5. Received: from alcatraz.alcatraz.org by mail.shlink.de with bsmtp
  6.     (Smail3.1.29.1 #1) id m0sppRw-000Sa3C; Tue, 5 Sep 95 06:17 MET DST
  7. To: amos-list@access.digex.net
  8. Message-Id: <wS3glMD261aRz1@p22.sixpack.pfalz.org>
  9. From: chris@sixpack.pfalz.org (Chris Hodges)
  10. Path: alcatraz.org!sixpack.pfalz.de!chris
  11. Subject: Re: "Klik'n'Play?!" [Sic!]
  12. Date: Mon, 04 Sep 1995 21:05:25 +0200
  13. X-Mailer: MicroDot 1.10 [REGISTERED 000261] via Connectline-CLMSortin 2.22
  14. References: <9509032200.AA0244h@comlink.mpx.com.au>
  15. X-Gateway: ZCONNECT US shlink.shlink.de [UNIX/Connect v0.71]
  16. MIME-Version: 1.0
  17. Content-Type: text/plain; charset=ISO-8859-1
  18. Content-Transfer-Encoding: 8bit
  19. X-Z-VIA: 19950905053846W+1@alcatraz.org
  20. X-Z-VIA: 19950904221024W+1@sixpack.pfalz.de
  21. X-Z-TELEFON: V+49-89/8005856
  22. X-Z-POST: Kennedystrasse 8; D-82178 Puchheim; Germany
  23. Lines: 46
  24. Status: RO
  25. X-Status: 
  26.  
  27. Darryl_Lewis@comlink.mpx.com.au (Darryl Lewis) wrote on 03.09.1995 some
  28. text under the subject Re: "Klik'n'Play?!" [Sic!]. I can't leave this
  29. uncommentated ;-)
  30.  
  31. DL>  CH> Ha! I've managed to write a short looping animation player using the
  32. DL>  CH> old AMOS commands ;-)
  33. DL> 
  34. DL> How about uploading it to the list?????!!!!!!!!!!!!
  35.  
  36. Here it is...
  37.  
  38. F$="data/AMCAF.anim"
  39. SPEED=2
  40. Examine Object F$
  41. OS=Object Size
  42. Reserve As Work 9,OS+12
  43. Bload F$,9
  44. ST=Start(9)
  45. Loke ST+OS,Asc.l("FORM")
  46. Loke ST+OS+4,0
  47. Loke ST+OS+8,Asc.l("DLTA")
  48. ST=Start(9)+12
  49. ST=Frame Play(ST,1,0)
  50. Double Buffer : Autoback 0
  51. Wait Vbl 
  52. SX=Screen Width : SY=Screen Height
  53. FR=0
  54. Repeat 
  55.   Screen Swap 
  56.   Repeat : Multi Wait : Until Timer>=SPEED : Timer=0
  57.   If FR=1 Then REST=ST
  58.   ST=Frame Play(ST,1) : Inc FR
  59.   If ST+12>=Start(9)+OS Then ST=REST : FR=1
  60. Until Inkey$=Chr$(27) or Mouse Key<>0
  61. Screen Close 0
  62. End 
  63.  
  64. Bye, Chris Hodges <chris@sixpack.pfalz.org>      __   __
  65. A4000/40/5MB/400HD/CD; AMOS Extension-Coder __  ///  / / _____
  66. GCS d H s-:++ !g p? !au a18 w++ v? C+++     \\\///  / /_/ ___/ LOGOUT
  67. E---- N++ K- W------ -po+ t++@ !5 j-- R+ G?  \XX/   \__/ __/  FASCISM!
  68. tv- b+ D-- B? e+(++)* u++ h! f !r n+ !y+ AMIGA RULEZ!  \/
  69.  
  70. Balemartine (n.)
  71.   The look which says, 'Stop talking to that woman at once.'
  72. (from: "The Deeper Meaning of Liff")
  73.